/ Acorn RISC PD-CD 1 / Acorn RISC PD-CD 1.iso / sillies / _oric / emulator

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1b f4 20 3e 20 | 3c 4f 72 69 63 24 44 69 |..... > |<Oric$Di|
|00000010| 72 3e 2e 45 6d 75 6c 61 | 74 6f 72 0d 00 14 16 f4 |r>.Emula|tor.....|
|00000020| 20 42 79 20 53 65 61 6e | 79 20 26 20 44 65 72 65 | By Sean|y & Dere|
|00000030| 6b 0d 00 1e 05 3a 0d 00 | 28 26 f4 20 76 31 2e 30 |k....:..|(&. v1.0|
|00000040| 30 20 20 37 74 68 20 4f | 63 74 6f 62 65 72 20 20 |0  7th O|ctober  |
|00000050| 31 39 39 30 20 28 53 65 | 61 6e 79 29 0d 00 32 24 |1990 (Se|any)..2$|
|00000060| f4 20 76 31 2e 30 31 20 | 31 30 74 68 20 46 65 62 |. v1.01 |10th Feb|
|00000070| 72 75 61 72 79 20 31 39 | 39 31 20 28 44 65 73 29 |ruary 19|91 (Des)|
|00000080| 0d 00 3c 26 f4 20 76 31 | 2e 30 32 20 32 37 74 68 |..<&. v1|.02 27th|
|00000090| 20 46 65 62 72 75 61 72 | 79 20 31 39 39 31 20 28 | Februar|y 1991 (|
|000000a0| 53 65 61 6e 79 29 0d 00 | 46 05 3a 0d 00 50 06 eb |Seany)..|F.:..P..|
|000000b0| 39 0d 00 5a 21 76 24 3d | 22 31 2e 30 32 22 20 20 |9..Z!v$=|"1.02"  |
|000000c0| 3a 20 f4 20 56 65 72 73 | 69 6f 6e 20 6e 75 6d 62 |: . Vers|ion numb|
|000000d0| 65 72 0d 00 64 0d 6e 6f | 72 65 61 64 79 3d a3 0d |er..d.no|ready=..|
|000000e0| 00 6e 0f de 6c 69 6e 65 | 24 28 36 30 30 29 0d 00 |.n..line|$(600)..|
|000000f0| 78 37 ff 22 43 48 41 4e | 4e 45 4c 56 4f 49 43 45 |x7."CHAN|NELVOICE|
|00000100| 20 31 20 50 69 6e 67 22 | 3a ff 22 54 55 4e 49 4e | 1 Ping"|:."TUNIN|
|00000110| 47 20 30 22 3a ff 22 54 | 55 4e 49 4e 47 20 2d 31 |G 0":."T|UNING -1|
|00000120| 30 38 30 30 22 0d 00 82 | 10 f1 8a 33 35 29 22 43 |0800"...|...35)"C|
|00000130| 41 50 53 22 3b 0d 00 8c | 0b fb 31 33 35 3a fb 30 |APS";...|..135:.0|
|00000140| 0d 00 96 11 ef 32 38 2c | 30 2c 33 31 2c 33 38 2c |.....28,|0,31,38,|
|00000150| 31 0d 00 a0 05 db 0d 00 | aa 49 f1 22 4f 52 49 43 |1.......|.I."ORIC|
|00000160| 20 45 58 54 45 4e 44 45 | 44 20 42 41 53 49 43 20 | EXTENDE|D BASIC |
|00000170| 56 31 2e 31 22 27 22 28 | 63 29 20 31 39 38 33 20 |V1.1"'"(|c) 1983 |
|00000180| 54 41 4e 47 45 52 49 4e | 45 22 27 27 22 34 37 38 |TANGERIN|E"''"478|
|00000190| 37 30 20 42 59 54 45 53 | 20 46 52 45 45 22 27 0d |70 BYTES| FREE"'.|
|000001a0| 00 b4 25 e7 20 6e 6f 72 | 65 61 64 79 20 8c 20 6e |..%. nor|eady . n|
|000001b0| 6f 72 65 61 64 79 3d a3 | 20 8b 20 f1 27 22 52 65 |oready=.| . .'"Re|
|000001c0| 61 64 79 22 0d 00 be 0a | e8 22 3e 22 73 24 0d 00 |ady"....|.">"s$..|
|000001d0| c8 0a f2 63 68 65 63 6b | 0d 00 d2 0a e5 20 8d 74 |...check|..... .t|
|000001e0| 74 40 0d 00 dc 05 3a 0d | 00 e6 0c dd 20 f2 63 68 |t@....:.|.... .ch|
|000001f0| 65 63 6b 0d 00 f0 0b 65 | 72 72 6f 72 3d a3 0d 00 |eck....e|rror=...|
|00000200| fa 18 e7 73 24 3d 22 43 | 41 54 22 20 8c 20 ff 22 |...s$="C|AT" . ."|
|00000210| 43 41 54 22 3a e1 0d 01 | 04 ba e7 73 24 3d 22 48 |CAT":...|...s$="H|
|00000220| 45 4c 4c 4f 22 20 8c 20 | f1 22 48 45 4c 4c 4f 20 |ELLO" . |."HELLO |
|00000230| 48 55 4d 41 4e 2c 20 48 | 4f 57 20 41 52 45 20 59 |HUMAN, H|OW ARE Y|
|00000240| 4f 55 20 22 3b 3a e8 22 | 22 61 6e 73 24 3b 3a e7 |OU ";:."|"ans$;:.|
|00000250| 61 6e 73 24 3d 22 46 49 | 4e 45 22 20 84 20 61 6e |ans$="FI|NE" . an|
|00000260| 73 24 3d 22 4f 4b 22 20 | 84 20 61 6e 73 24 3d 22 |s$="OK" |. ans$="|
|00000270| 47 4f 4f 44 22 20 84 20 | 61 6e 73 24 3d 22 47 52 |GOOD" . |ans$="GR|
|00000280| 45 41 54 22 20 84 20 61 | 6e 73 24 3d 22 57 45 4c |EAT" . a|ns$="WEL|
|00000290| 4c 22 20 8c 20 f1 22 49 | 27 6d 20 67 6c 61 64 22 |L" . ."I|'m glad"|
|000002a0| 3a e1 20 8b 20 e7 20 73 | 24 3d 22 48 45 4c 4c 4f |:. . . s|$="HELLO|
|000002b0| 22 20 f1 22 4f 68 2c 20 | 49 27 6d 20 73 6f 72 72 |" ."Oh, |I'm sorr|
|000002c0| 79 20 61 62 6f 75 74 20 | 74 68 61 74 2e 22 3a e1 |y about |that.":.|
|000002d0| 0d 01 0e 55 e7 73 24 3d | 22 50 49 4e 47 22 20 84 |...U.s$=|"PING" .|
|000002e0| 20 73 24 3d 22 56 44 55 | 37 22 20 8c 20 ff 22 43 | s$="VDU|7" . ."C|
|000002f0| 48 41 4e 4e 45 4c 56 4f | 49 43 45 20 31 20 50 69 |HANNELVO|ICE 1 Pi|
|00000300| 6e 67 22 3a ff 22 54 55 | 4e 49 4e 47 20 30 22 3a |ng":."TU|NING 0":|
|00000310| ff 22 54 55 4e 49 4e 47 | 20 2d 31 30 38 30 30 22 |."TUNING| -10800"|
|00000320| 3a ef 37 3a e1 0d 01 18 | 47 e7 73 24 3d 22 5a 41 |:.7:....|G.s$="ZA|
|00000330| 50 22 20 8c 20 ff 22 43 | 48 41 4e 4e 45 4c 56 4f |P" . ."C|HANNELVO|
|00000340| 49 43 45 20 31 20 5a 61 | 70 22 3a ff 22 54 55 4e |ICE 1 Za|p":."TUN|
|00000350| 49 4e 47 20 30 22 3a ff | 22 54 55 4e 49 4e 47 20 |ING 0":.|"TUNING |
|00000360| 2d 31 30 38 30 30 22 3a | ef 37 3a e1 0d 01 22 4f |-10800":|.7:..."O|
|00000370| e7 73 24 3d 22 45 58 50 | 4c 4f 44 45 22 20 8c 20 |.s$="EXP|LODE" . |
|00000380| ff 22 43 48 41 4e 4e 45 | 4c 56 4f 49 43 45 20 31 |."CHANNE|LVOICE 1|
|00000390| 20 45 78 70 6c 6f 64 65 | 22 3a ff 22 54 55 4e 49 | Explode|":."TUNI|
|000003a0| 4e 47 20 30 22 3a ff 22 | 54 55 4e 49 4e 47 20 2d |NG 0":."|TUNING -|
|000003b0| 31 30 38 30 30 22 3a ef | 37 3a e1 0d 01 2c 4b e7 |10800":.|7:...,K.|
|000003c0| 73 24 3d 22 53 48 4f 4f | 54 22 20 8c 20 ff 22 43 |s$="SHOO|T" . ."C|
|000003d0| 48 41 4e 4e 45 4c 56 4f | 49 43 45 20 31 20 53 68 |HANNELVO|ICE 1 Sh|
|000003e0| 6f 6f 74 22 3a ff 22 54 | 55 4e 49 4e 47 20 30 22 |oot":."T|UNING 0"|
|000003f0| 3a ff 22 54 55 4e 49 4e | 47 20 2d 31 30 38 30 30 |:."TUNIN|G -10800|
|00000400| 22 3a ef 37 3a e1 0d 01 | 36 7f e7 73 24 3d 22 45 |":.7:...|6..s$="E|
|00000410| 4c 41 49 4e 45 22 20 8c | 20 e8 22 44 6f 20 79 6f |LAINE" .| ."Do yo|
|00000420| 75 20 6b 6e 6f 77 20 77 | 68 6f 20 49 20 61 6d 20 |u know w|ho I am |
|00000430| 22 3b 3a e8 22 22 61 6e | 73 24 3b 3a e7 61 6e 73 |";:.""an|s$;:.ans|
|00000440| 24 3d 22 59 45 53 22 20 | 8c 20 f1 22 4f 4b 22 3a |$="YES" |. ."OK":|
|00000450| e1 20 8b 20 e7 20 73 24 | 3d 22 45 4c 41 49 4e 45 |. . . s$|="ELAINE|
|00000460| 22 20 f1 22 59 6f 75 20 | 73 68 6f 75 6c 64 20 64 |" ."You |should d|
|00000470| 6f 2c 20 63 6f 73 20 79 | 6f 75 20 6f 77 6e 20 6d |o, cos y|ou own m|
|00000480| 65 21 22 3a e1 0d 01 40 | 16 e7 73 24 3d 22 48 49 |e!":...@|..s$="HI|
|00000490| 52 45 53 22 20 8c 20 eb | 30 3a e1 0d 01 4a 16 e7 |RES" . .|0:...J..|
|000004a0| 73 24 3d 22 4c 4f 52 45 | 53 22 20 8c 20 eb 32 3a |s$="LORE|S" . .2:|
|000004b0| e1 0d 01 54 13 e7 73 24 | 3d 22 43 4c 53 22 20 8c |...T..s$|="CLS" .|
|000004c0| 20 db 3a e1 0d 01 5e 15 | e7 73 24 3d 22 50 52 49 | .:...^.|.s$="PRI|
|000004d0| 4e 54 22 20 8c 20 f1 3a | e1 0d 01 68 22 e7 73 24 |NT" . .:|...h".s$|
|000004e0| 3d 22 53 45 41 4e 22 20 | 8c 20 f1 22 48 45 4c 4c |="SEAN" |. ."HELL|
|000004f0| 4f 20 53 45 41 4e 59 21 | 22 3a e1 0d 01 72 23 e7 |O SEANY!|":...r#.|
|00000500| 73 24 3d 22 44 45 52 45 | 4b 22 20 8c 20 f1 22 48 |s$="DERE|K" . ."H|
|00000510| 65 6c 6c 6f 20 44 65 72 | 65 6b 21 22 3a e1 0d 01 |ello Der|ek!":...|
|00000520| 7c 31 e7 73 24 3d 22 48 | 45 4c 50 22 20 8c 20 f1 ||1.s$="H|ELP" . .|
|00000530| 22 54 68 69 73 20 69 73 | 20 61 6e 20 4f 72 69 63 |"This is| an Oric|
|00000540| 2d 31 20 45 6d 75 6c 61 | 74 69 6f 6e 22 3a e1 0d |-1 Emula|tion":..|
|00000550| 01 86 16 e7 73 24 3d 22 | 52 55 4e 22 20 8c 20 f2 |....s$="|RUN" . .|
|00000560| 72 75 6e 3a e1 0d 01 90 | 18 e7 73 24 3d 22 4c 49 |run:....|..s$="LI|
|00000570| 53 54 22 20 8c 20 f2 6c | 69 73 74 3a e1 0d 01 9a |ST" . .l|ist:....|
|00000580| 25 e7 c0 73 24 2c 33 29 | 3d 22 52 45 4d 22 20 84 |%..s$,3)|="REM" .|
|00000590| 20 c0 73 24 2c 33 29 3d | 22 20 52 45 4d 22 20 8c | .s$,3)=|" REM" .|
|000005a0| 20 e1 0d 01 a4 1d e7 c0 | 73 24 2c 35 29 3d 22 43 | .......|s$,5)="C|
|000005b0| 4c 4f 41 44 22 20 8c 20 | f2 6c 6f 61 64 3a e1 0d |LOAD" . |.load:..|
|000005c0| 01 ae 1d e7 c0 73 24 2c | 35 29 3d 22 43 53 41 56 |.....s$,|5)="CSAV|
|000005d0| 45 22 20 8c 20 f2 73 61 | 76 65 3a e1 0d 01 b8 2a |E" . .sa|ve:....*|
|000005e0| e7 c0 73 24 2c 33 29 3d | 22 49 4e 4b 22 20 8c 20 |..s$,3)=|"INK" . |
|000005f0| 78 24 3d c2 73 24 2c 31 | 29 3a 78 3d bb 28 78 24 |x$=.s$,1|):x=.(x$|
|00000600| 29 3a fb 78 3a e1 0d 01 | c2 30 e7 c0 73 24 2c 35 |):.x:...|.0..s$,5|
|00000610| 29 3d 22 50 41 50 45 52 | 22 20 8c 20 78 24 3d c2 |)="PAPER|" . x$=.|
|00000620| 73 24 2c 31 29 3a 78 3d | bb 28 78 24 29 3a fb 78 |s$,1):x=|.(x$):.x|
|00000630| 2b 31 32 38 3a e1 0d 01 | cc 79 6c 6e 24 3d c0 73 |+128:...|.yln$=.s|
|00000640| 24 2c 31 29 3a e7 20 6c | 6e 24 3d 22 31 22 20 84 |$,1):. l|n$="1" .|
|00000650| 20 6c 6e 24 3d 22 32 22 | 20 84 20 6c 6e 24 3d 22 | ln$="2"| . ln$="|
|00000660| 33 22 20 84 20 6c 6e 24 | 3d 22 34 22 20 84 20 6c |3" . ln$|="4" . l|
|00000670| 6e 24 3d 22 35 22 20 84 | 20 6c 6e 24 3d 22 36 22 |n$="5" .| ln$="6"|
|00000680| 20 84 20 6c 6e 24 3d 22 | 37 22 20 84 20 6c 6e 24 | . ln$="|7" . ln$|
|00000690| 3d 22 38 22 20 84 20 6c | 6e 24 3d 22 39 22 20 8c |="8" . l|n$="9" .|
|000006a0| 20 f2 61 64 64 6c 69 6e | 65 28 73 24 29 3a e1 0d | .addlin|e(s$):..|
|000006b0| 01 d6 18 e7 73 24 3d 22 | 41 55 54 4f 22 20 8c 20 |....s$="|AUTO" . |
|000006c0| f2 61 75 74 6f 3a e1 0d | 01 e0 20 e7 73 24 3d 22 |.auto:..|.. .s$="|
|000006d0| 52 45 53 45 54 22 20 84 | 20 73 24 3d 22 42 52 45 |RESET" .| s$="BRE|
|000006e0| 41 4b 22 20 8c 20 f9 0d | 01 ea 1c e7 73 24 3d 22 |AK" . ..|....s$="|
|000006f0| 4e 45 57 22 20 8c 20 6c | 69 6e 65 24 28 29 3d 22 |NEW" . l|ine$()="|
|00000700| 22 3a e1 0d 01 f4 3c e7 | 73 24 3d 22 56 45 52 53 |":....<.|s$="VERS|
|00000710| 49 4f 4e 22 8c f1 22 21 | 4f 72 69 63 20 56 65 72 |ION".."!|Oric Ver|
|00000720| 73 69 6f 6e 20 22 3b 76 | 24 3b 22 20 62 79 20 53 |sion ";v|$;" by S|
|00000730| 65 61 6e 79 20 26 20 44 | 65 72 65 6b 22 3a e1 0d |eany & D|erek":..|
|00000740| 01 fe 44 e7 73 24 3d 22 | 51 55 49 54 22 20 8c 20 |..D.s$="|QUIT" . |
|00000750| ff 22 46 58 32 32 39 22 | 3a ff 22 43 48 41 4e 4e |."FX229"|:."CHANN|
|00000760| 45 4c 56 4f 49 43 45 20 | 31 20 31 22 3a ff 22 54 |ELVOICE |1 1":."T|
|00000770| 55 4e 49 4e 47 20 30 22 | 3a ff 22 44 45 53 4b 54 |UNING 0"|:."DESKT|
|00000780| 4f 50 22 0d 02 08 16 e7 | 73 24 3d 22 50 52 4f 4e |OP".....|s$="PRON|
|00000790| 22 20 8c 20 ef 20 32 3a | e1 0d 02 12 17 e7 73 24 |" . . 2:|......s$|
|000007a0| 3d 22 50 52 4f 46 46 22 | 20 8c 20 ef 20 33 3a e1 |="PROFF"| . . 3:.|
|000007b0| 0d 02 1c 0e e7 73 24 3d | 22 22 20 8c 20 e1 0d 02 |.....s$=|"" . ...|
|000007c0| 26 14 f1 22 3f 53 59 4e | 54 41 58 20 45 52 52 4f |&.."?SYN|TAX ERRO|
|000007d0| 52 22 0d 02 30 0b 65 72 | 72 6f 72 3d b9 0d 02 3a |R"..0.er|ror=...:|
|000007e0| 05 e1 0d 02 44 05 3a 0d | 02 4e 4b f4 20 2a 2a 2a |....D.:.|.NK. ***|
|000007f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000800| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000810| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000820| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000830| 2a 2a 0d 02 58 49 f4 20 | 48 65 72 65 20 69 73 20 |**..XI. |Here is |
|00000840| 74 68 65 20 72 65 61 6c | 6c 79 20 6d 65 73 73 79 |the real|ly messy|
|00000850| 20 62 69 74 20 74 68 61 | 74 20 49 20 77 72 6f 74 | bit tha|t I wrot|
|00000860| 65 20 2e 2e 2e 2e 2e 2e | 2e 20 49 74 73 20 76 65 |e ......|. Its ve|
|00000870| 72 79 20 63 6f 6c 64 20 | 61 6e 64 0d 02 62 34 f4 |ry cold |and..b4.|
|00000880| 20 73 6e 6f 77 79 20 61 | 6e 64 20 49 20 64 69 64 | snowy a|nd I did|
|00000890| 6e 27 74 20 68 61 76 65 | 20 61 6e 79 74 68 69 6e |n't have| anythin|
|000008a0| 67 20 62 65 74 74 65 72 | 20 74 6f 20 64 6f 21 0d |g better| to do!.|
|000008b0| 02 6c 2d f4 20 49 74 73 | 20 6e 61 75 67 68 74 79 |.l-. Its| naughty|
|000008c0| 20 70 72 6f 67 72 61 6d | 6d 69 6e 67 20 28 62 75 | program|ming (bu|
|000008d0| 74 20 69 74 20 77 6f 72 | 6b 73 21 29 0d 02 76 4b |t it wor|ks!)..vK|
|000008e0| f4 20 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |. ******|********|
|000008f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000900| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000910| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000920| 2a 2a 2a 2a 2a 2a 2a 0d | 02 80 11 dd f2 61 64 64 |*******.|.....add|
|00000930| 6c 69 6e 65 28 6c 24 29 | 0d 02 8a 0d 6e 6f 72 65 |line(l$)|....nore|
|00000940| 61 64 79 3d b9 0d 02 94 | 0b 70 6c 61 63 65 3d 30 |ady=....|.place=0|
|00000950| 0d 02 9e 07 4e 3d 30 0d | 02 a8 0b f5 3a 4e 3d 4e |....N=0.|....:N=N|
|00000960| 2b 31 0d 02 b2 12 6c 69 | 6e 65 24 3d c1 6c 24 2c |+1....li|ne$=.l$,|
|00000970| 4e 2c 31 29 0d 02 bc 39 | e7 20 97 28 6c 69 6e 65 |N,1)...9|. .(line|
|00000980| 24 29 3c 34 38 20 84 20 | 97 28 6c 69 6e 65 24 29 |$)<48 . |.(line$)|
|00000990| 3e 35 37 20 8c 20 e7 20 | 97 28 6c 69 6e 65 24 29 |>57 . . |.(line$)|
|000009a0| 3c 3e 30 20 8c 20 70 6c | 61 63 65 3d 4e 0d 02 c6 |<>0 . pl|ace=N...|
|000009b0| 14 fd 20 4e 3d 34 20 84 | 20 70 6c 61 63 65 3c 3e |.. N=4 .| place<>|
|000009c0| 30 0d 02 d0 26 e7 20 70 | 6c 61 63 65 3d 30 20 8c |0...&. p|lace=0 .|
|000009d0| 20 f1 22 54 6f 6f 20 48 | 69 67 68 20 61 20 6e 75 | ."Too H|igh a nu|
|000009e0| 6d 62 65 72 22 3a e1 0d | 02 da 1c 6c 69 6e 65 6e |mber":..|...linen|
|000009f0| 75 6d 62 65 72 3d bb 28 | c0 6c 24 2c 70 6c 61 63 |umber=.(|.l$,plac|
|00000a00| 65 29 29 0d 02 e4 2c e7 | 6c 69 6e 65 6e 75 6d 62 |e))...,.|linenumb|
|00000a10| 65 72 3e 33 30 30 20 8c | 20 f1 22 54 6f 6f 20 48 |er>300 .| ."Too H|
|00000a20| 69 67 68 20 61 20 6e 75 | 6d 62 65 72 22 3a e1 0d |igh a nu|mber":..|
|00000a30| 02 ee 2e 6c 69 6e 65 24 | 28 6c 69 6e 65 6e 75 6d |...line$|(linenum|
|00000a40| 62 65 72 29 3d c1 6c 24 | 2c 70 6c 61 63 65 2c a9 |ber)=.l$|,place,.|
|00000a50| 28 6c 24 29 2d 70 6c 61 | 63 65 2b 31 29 0d 02 f8 |(l$)-pla|ce+1)...|
|00000a60| 05 e1 0d 03 02 05 3a 0d | 03 0c 09 dd f2 72 75 6e |......:.|.....run|
|00000a70| 0d 03 16 0d 6e 6f 72 65 | 61 64 79 3d b9 0d 03 20 |....nore|ady=... |
|00000a80| 07 4e 3d 30 0d 03 2a 0b | f5 3a 4e 3d 4e 2b 31 0d |.N=0..*.|.:N=N+1.|
|00000a90| 03 34 14 e7 20 6c 69 6e | 65 24 28 4e 29 3c 3e 22 |.4.. lin|e$(N)<>"|
|00000aa0| 22 20 8c 0d 03 3e 0b 73 | 70 61 63 65 3d 30 0d 03 |" ...>.s|pace=0..|
|00000ab0| 48 09 65 6e 64 3d a3 0d | 03 52 0b 73 74 61 72 74 |H.end=..|.R.start|
|00000ac0| 3d a3 0d 03 5c 29 f4 20 | 2d 2d 2d 2d 2d 20 67 65 |=...\). |----- ge|
|00000ad0| 74 20 72 69 64 20 6f 66 | 20 61 6e 79 20 6c 65 61 |t rid of| any lea|
|00000ae0| 64 69 6e 67 20 73 70 61 | 63 65 73 0d 03 66 1d 77 |ding spa|ces..f.w|
|00000af0| 3d 31 3a f5 3a 73 3d 97 | 28 c1 6c 69 6e 65 24 28 |=1:.:s=.|(.line$(|
|00000b00| 4e 29 2c 77 2c 31 29 29 | 0d 03 70 14 e7 20 73 3d |N),w,1))|..p.. s=|
|00000b10| 33 32 20 8c 20 73 70 61 | 63 65 3d 77 0d 03 7a 14 |32 . spa|ce=w..z.|
|00000b20| e7 20 73 3d 33 32 20 8c | 20 73 74 61 72 74 3d b9 |. s=32 .| start=.|
|00000b30| 0d 03 84 1d e7 20 73 3c | 3e 33 32 20 80 20 73 74 |..... s<|>32 . st|
|00000b40| 61 72 74 3d b9 20 8c 20 | 65 6e 64 3d b9 0d 03 8e |art=. . |end=....|
|00000b50| 08 77 2b 3d 31 0d 03 98 | 1b fd 20 77 3d a9 28 6c |.w+=1...|.. w=.(l|
|00000b60| 69 6e 65 24 28 4e 29 29 | 20 84 20 65 6e 64 3d b9 |ine$(N))| . end=.|
|00000b70| 0d 03 a2 11 73 70 61 63 | 65 3d 73 70 61 63 65 2b |....spac|e=space+|
|00000b80| 31 0d 03 ac 2b 73 24 3d | c1 6c 69 6e 65 24 28 4e |1...+s$=|.line$(N|
|00000b90| 29 2c 73 70 61 63 65 2c | a9 28 6c 69 6e 65 24 28 |),space,|.(line$(|
|00000ba0| 4e 29 29 2d 73 70 61 63 | 65 2b 31 29 0d 03 b6 0a |N))-spac|e+1)....|
|00000bb0| f2 63 68 65 63 6b 0d 03 | c0 1e f4 20 2d 2d 2d 2d |.check..|... ----|
|00000bc0| 2d 20 53 6c 6f 77 20 41 | 72 63 68 69 65 20 64 6f |- Slow A|rchie do|
|00000bd0| 77 6e 20 21 0d 03 ca 14 | e3 20 54 3d 31 20 b8 20 |wn !....|. T=1 . |
|00000be0| 34 30 30 30 3a ed 20 54 | 0d 03 d4 0b f4 20 2d 2d |4000:. T|..... --|
|00000bf0| 2d 2d 2d 0d 03 de 05 cd | 0d 03 e8 15 fd 20 65 72 |---.....|..... er|
|00000c00| 72 6f 72 3d b9 20 84 20 | 4e 3d 33 30 30 0d 03 f2 |ror=. . |N=300...|
|00000c10| 2a e7 20 65 72 72 6f 72 | 3d b9 20 8c 20 f1 27 22 |*. error|=. . .'"|
|00000c20| 3f 45 52 52 4f 52 20 49 | 4e 20 50 52 4f 47 52 41 |?ERROR I|N PROGRA|
|00000c30| 4d 20 2d 20 22 3b 4e 0d | 03 fc 05 e1 0d 04 06 05 |M - ";N.|........|
|00000c40| 3a 0d 04 10 0a dd f2 6c | 69 73 74 0d 04 1a 0d 6e |:......l|ist....n|
|00000c50| 6f 72 65 61 64 79 3d b9 | 0d 04 24 07 4e 3d 30 0d |oready=.|..$.N=0.|
|00000c60| 04 2e 0b f5 3a 4e 3d 4e | 2b 31 0d 04 38 14 e7 20 |....:N=N|+1..8.. |
|00000c70| 6c 69 6e 65 24 28 4e 29 | 3c 3e 22 22 20 8c 0d 04 |line$(N)|<>"" ...|
|00000c80| 42 0b 62 65 67 24 3d 22 | 22 0d 04 4c 17 e7 20 4e |B.beg$="|"..L.. N|
|00000c90| 3c 31 30 20 8c 20 62 65 | 67 24 3d 22 20 20 20 22 |<10 . be|g$="   "|
|00000ca0| 0d 04 56 1d e7 20 4e 3c | 31 30 30 20 80 20 4e 3e |..V.. N<|100 . N>|
|00000cb0| 39 20 8c 20 62 65 67 24 | 3d 22 20 20 22 0d 04 60 |9 . beg$|="  "..`|
|00000cc0| 15 e7 20 4e 3e 39 39 20 | 8c 20 62 65 67 24 3d 22 |.. N>99 |. beg$="|
|00000cd0| 20 22 0d 04 6a 14 f1 62 | 65 67 24 3b 4e 3b 6c 69 | "..j..b|eg$;N;li|
|00000ce0| 6e 65 24 28 4e 29 0d 04 | 74 05 cd 0d 04 7e 0b fd |ne$(N)..|t....~..|
|00000cf0| 20 4e 3d 33 30 30 0d 04 | 88 05 e1 0d 04 92 05 3a | N=300..|.......:|
|00000d00| 0d 04 9c 0a dd f2 73 61 | 76 65 0d 04 a6 18 73 61 |......sa|ve....sa|
|00000d10| 76 65 24 3d c1 73 24 2c | 37 2c a9 28 73 24 29 2b |ve$=.s$,|7,.(s$)+|
|00000d20| 31 29 0d 04 b0 40 ef 32 | 38 2c 30 2c 33 31 2c 33 |1)...@.2|8,0,31,3|
|00000d30| 38 2c 30 3a fb 37 3a fb | 31 32 38 3a 87 3a f1 8a |8,0:.7:.|128:.:..|
|00000d40| 30 2c 30 29 22 53 61 76 | 69 6e 67 20 20 20 20 20 |0,0)"Sav|ing     |
|00000d50| 2e 2e 20 20 20 20 22 3b | 73 61 76 65 24 3a ef 20 |..    ";|save$:. |
|00000d60| 32 36 0d 04 ba 0e 46 3d | ae 28 73 61 76 65 24 29 |26....F=|.(save$)|
|00000d70| 0d 04 c4 31 d5 23 46 2c | 22 4f 72 69 63 20 46 69 |...1.#F,|"Oric Fi|
|00000d80| 6c 65 20 28 26 39 39 39 | 29 20 3a 20 42 45 46 2d |le (&999|) : BEF-|
|00000d90| 41 53 20 3a 20 56 45 52 | 53 49 4f 4e 20 22 2b 76 |AS : VER|SION "+v|
|00000da0| 24 0d 04 ce 0f e3 20 4e | 3d 31 20 b8 20 33 30 30 |$..... N|=1 . 300|
|00000db0| 0d 04 d8 10 d5 23 46 2c | 6c 69 6e 65 24 28 4e 29 |.....#F,|line$(N)|
|00000dc0| 0d 04 e2 07 ed 20 4e 0d | 04 ec 07 d9 23 46 0d 04 |..... N.|....#F..|
|00000dd0| f6 1d ff 22 53 65 74 54 | 79 70 65 20 22 2b 73 61 |..."SetT|ype "+sa|
|00000de0| 76 65 24 2b 22 20 26 39 | 39 39 22 0d 05 00 26 ef |ve$+" &9|99"...&.|
|00000df0| 32 38 2c 30 2c 33 31 2c | 33 38 2c 30 3a fb 20 31 |28,0,31,|38,0:. 1|
|00000e00| 32 38 3a db 3a f1 8a 33 | 35 29 3b 22 43 41 50 53 |28:.:..3|5);"CAPS|
|00000e10| 22 0d 05 0a 1d fb 30 3a | fb 31 33 35 3a ef 32 38 |".....0:|.135:.28|
|00000e20| 2c 30 2c 33 31 2c 33 38 | 2c 31 3a db 3a e1 0d 05 |,0,31,38|,1:.:...|
|00000e30| 14 05 e1 0d 05 1e 05 3a | 0d 05 28 0a dd f2 6c 6f |.......:|..(...lo|
|00000e40| 61 64 0d 05 32 1c ee 85 | eb 31 32 3a f6 3a f1 22 |ad..2...|.12:.:."|
|00000e50| 20 61 74 20 6c 69 6e 65 | 20 22 3b 9e 3a e0 0d 05 | at line| ";.:...|
|00000e60| 3c 0e 6c 69 6e 65 24 28 | 29 3d 22 22 0d 05 46 79 |<.line$(|)=""..Fy|
|00000e70| 6c 6f 61 64 24 3d c1 73 | 24 2c 37 2c a9 28 73 24 |load$=.s|$,7,.(s$|
|00000e80| 29 2b 31 29 3a e7 6c 6f | 61 64 24 3d 22 22 20 84 |)+1):.lo|ad$="" .|
|00000e90| 20 6c 6f 61 64 24 3d 22 | 22 22 22 20 8c 20 6c 6f | load$="|""" . lo|
|00000ea0| 61 64 24 3d 22 2a 22 3a | f4 20 69 66 20 6e 6f 20 |ad$="*":|. if no |
|00000eb0| 66 69 6c 65 6e 61 6d 65 | 20 67 69 76 65 6e 2c 20 |filename| given, |
|00000ec0| 74 68 65 6e 20 74 61 6b | 65 20 74 68 65 20 66 69 |then tak|e the fi|
|00000ed0| 72 73 74 20 61 73 20 69 | 6e 20 74 61 70 65 20 6c |rst as i|n tape l|
|00000ee0| 6f 61 64 65 72 0d 05 50 | 5f ef 32 38 2c 30 2c 33 |oader..P|_.28,0,3|
|00000ef0| 31 2c 33 38 2c 30 3a fb | 37 3a fb 31 32 38 3a 87 |1,38,0:.|7:.128:.|
|00000f00| 3a f1 8a 30 2c 30 29 22 | 53 65 61 72 63 68 69 6e |:..0,0)"|Searchin|
|00000f10| 67 20 2e 2e 22 3b 3a 58 | 3d a6 28 31 30 30 29 3a |g ..";:X|=.(100):|
|00000f20| f1 8a 30 2c 30 29 22 4c | 6f 61 64 69 6e 67 20 20 |..0,0)"L|oading  |
|00000f30| 20 20 2e 2e 20 20 20 20 | 22 3b 6c 6f 61 64 24 3a |  ..    |";load$:|
|00000f40| ef 20 32 36 0d 05 5a 0e | 46 3d 8e 28 6c 6f 61 64 |. 26..Z.|F=.(load|
|00000f50| 24 29 0d 05 64 5b e7 20 | 46 3d 30 20 8c 20 d9 23 |$)..d[. |F=0 . .#|
|00000f60| 46 3a ef 32 38 2c 30 2c | 33 31 2c 33 38 2c 30 3a |F:.28,0,|31,38,0:|
|00000f70| fb 20 31 32 38 3a db 3a | f1 8a 33 35 29 3b 22 43 |. 128:.:|..35);"C|
|00000f80| 41 50 53 22 3a fb 30 3a | fb 31 33 35 3a ef 32 38 |APS":.0:|.135:.28|
|00000f90| 2c 30 2c 33 31 2c 33 38 | 2c 31 3a db 3a f1 22 3f |,0,31,38|,1:.:."?|
|00000fa0| 4e 4f 54 20 46 4f 55 4e | 44 22 27 3a e1 0d 05 6e |NOT FOUN|D"':...n|
|00000fb0| 0b 69 64 24 3d be 23 46 | 0d 05 78 8c e7 c0 69 64 |.id$=.#F|..x...id|
|00000fc0| 24 2c 33 35 29 3c 3e 22 | 4f 72 69 63 20 46 69 6c |$,35)<>"|Oric Fil|
|00000fd0| 65 20 28 26 39 39 39 29 | 20 3a 20 42 45 46 2d 41 |e (&999)| : BEF-A|
|00000fe0| 53 20 3a 20 56 45 52 53 | 49 4f 4e 22 20 8c 20 d9 |S : VERS|ION" . .|
|00000ff0| 23 46 3a ef 32 38 2c 30 | 2c 33 31 2c 33 38 2c 30 |#F:.28,0|,31,38,0|
|00001000| 3a fb 20 31 32 38 3a db | 3a f1 8a 33 35 29 3b 22 |:. 128:.|:..35);"|
|00001010| 43 41 50 53 22 3a fb 30 | 3a fb 31 33 35 3a ef 32 |CAPS":.0|:.135:.2|
|00001020| 38 2c 30 2c 33 31 2c 33 | 38 2c 31 3a db 3a f1 22 |8,0,31,3|8,1:.:."|
|00001030| 3f 4e 4f 54 20 41 4e 20 | 4f 52 49 43 20 46 49 4c |?NOT AN |ORIC FIL|
|00001040| 45 22 3a e1 0d 05 82 0f | e3 20 4e 3d 31 20 b8 20 |E":.....|. N=1 . |
|00001050| 33 30 30 0d 05 8c 10 6c | 69 6e 65 24 28 4e 29 3d |300....l|ine$(N)=|
|00001060| be 23 46 0d 05 96 07 ed | 20 4e 0d 05 a0 07 d9 23 |.#F.....| N.....#|
|00001070| 46 0d 05 aa 26 ef 32 38 | 2c 30 2c 33 31 2c 33 38 |F...&.28|,0,31,38|
|00001080| 2c 30 3a fb 20 31 32 38 | 3a db 3a f1 8a 33 35 29 |,0:. 128|:.:..35)|
|00001090| 3b 22 43 41 50 53 22 0d | 05 b4 1d fb 30 3a fb 31 |;"CAPS".|....0:.1|
|000010a0| 33 35 3a ef 32 38 2c 30 | 2c 33 31 2c 33 38 2c 31 |35:.28,0|,31,38,1|
|000010b0| 3a db 3a e1 0d 05 be 05 | e1 0d 05 c8 05 3a 0d 05 |:.:.....|.....:..|
|000010c0| d2 0a dd f2 61 75 74 6f | 0d 05 dc 19 ee 85 e7 9f |....auto|........|
|000010d0| 3c 3e 31 37 8c f6 3a e0 | 20 8b 20 f2 63 68 65 63 |<>17..:.| . .chec|
|000010e0| 6b 0d 05 e6 13 e3 6c 69 | 6e 65 3d 31 30 b8 33 30 |k.....li|ne=10.30|
|000010f0| 30 88 31 30 0d 05 f0 0e | f1 6c 69 6e 65 3b 3a e8 |0.10....|.line;:.|
|00001100| 73 24 0d 05 fa 77 6c 6e | 24 3d c0 73 24 2c 31 29 |s$...wln|$=.s$,1)|
|00001110| 3a e7 20 6c 6e 24 3d 22 | 31 22 20 84 20 6c 6e 24 |:. ln$="|1" . ln$|
|00001120| 3d 22 32 22 20 84 20 6c | 6e 24 3d 22 33 22 20 84 |="2" . l|n$="3" .|
|00001130| 20 6c 6e 24 3d 22 34 22 | 20 84 20 6c 6e 24 3d 22 | ln$="4"| . ln$="|
|00001140| 35 22 20 84 20 6c 6e 24 | 3d 22 36 22 20 84 20 6c |5" . ln$|="6" . l|
|00001150| 6e 24 3d 22 37 22 20 84 | 20 6c 6e 24 3d 22 38 22 |n$="7" .| ln$="8"|
|00001160| 20 84 20 6c 6e 24 3d 22 | 39 22 20 8c 20 f2 61 64 | . ln$="|9" . .ad|
|00001170| 64 6c 69 6e 65 28 73 24 | 29 0d 06 04 04 0d 06 0e |dline(s$|).......|
|00001180| 09 ed 6c 69 6e 65 0d 06 | 18 05 e1 0d ff          |..line..|.....   |
+--------+-------------------------+-------------------------+--------+--------+